Option Explicit
Sub A_Sample056()
    Dim mySht As Worksheet
    Dim myWb As Workbook
    Dim myRng As Range
    Set myWb = Workbooks(1)
    Set myRng = myWb.Worksheets(2).Range("C3")	@'Nxs
    'ǳƨ즹
    Set mySht = myRng.Parent
    MsgBox mySht.Name
    Set myRng = Nothing				'
    Set mySht = Nothing
    Set myWb = Nothing
End Sub

